home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Tele / G / GEnieDL'er.cpt / Timeout Error < prev    next >
Encoding:
Text File  |  1988-08-10  |  913 b   |  30 lines  |  [TEXT/MACA]
  1.  Settings File = GEnie-upl
  2.  Script Name = Timeout Error
  3.  Command Key = 
  4.  F-key = 
  5.  Menu = NO
  6.  Button = NO
  7.  
  8. 1   If Expression  "=TimeOutRecover=true"
  9. 2     Set Variable TimeOutRecover from Expression  "=false"
  10. 3     Set Variable NoOfTry from Expression  "=0"
  11. 4     Dialog Discard  
  12. 5     Dialog Install  "Try to recover from timeout error gracefully and log off properly..."
  13. 6     Repeat
  14. 7       Send Text String  "^M"
  15. 8       Do Script * "Break"
  16. 9       Send Text String  "^M"
  17. 10      When Text Equals  ">elp?"
  18. 11        Dialog Discard  
  19. 12        Dialog Install  "Successful recovery from timeout error...^MLog off..."
  20. 13        Do Script * "Log Off"
  21. 14      Or When Seconds Have Passed  "=30"
  22. 15      End When
  23. 16      Set Variable NoOfTry from Expression  "=NoOfTry+1"
  24. 17    Until Expression  "=NoOfTry=5"
  25. 18    Do Script * "Log Off"
  26. 19  Else
  27. 20    Alert * OK  "TimeOut Error...."
  28. 21    Abort Script
  29. 22  End If
  30.